From 6c0a3f36f78517227afa5650d46a1ecfa237d292 Mon Sep 17 00:00:00 2001
From: Gerd Moellmann <gerd@gnu.org>
Date: Mon, 11 Dec 2000 21:13:10 +0000
Subject: [PATCH] (Fx_hide_tip): Fix last change.

---
 src/xfns.c | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/src/xfns.c b/src/xfns.c
index 03130eb1e1f..930269c738f 100644
--- a/src/xfns.c
+++ b/src/xfns.c
@@ -10764,9 +10764,13 @@ Value is t is tooltip was open, nil otherwise.")
   
   if (!NILP (tip_timer))
     {
-      Lisp_Object tem = tip_timer;
+      Lisp_Object tem;
+      struct gcpro gcpro1;
+      tem = tip_timer;
+      GCPRO1 (tem);
       tip_timer = Qnil;
       call1 (intern ("cancel-timer"), tem);
+      UNGCPRO;
     }
 
   if (FRAMEP (tip_frame))
@@ -10779,6 +10783,7 @@ Value is t is tooltip was open, nil otherwise.")
       tip_frame = Qnil;
       Fdelete_frame (frame, Qnil);
       deleted = Qt;
+      UNGCPRO;
 
 #ifdef USE_LUCID
       /* Bloodcurdling hack alert: The Lucid menu bar widget's
-- 
2.30.2